home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1987 November / Ahoy_Magazine_87-11_1987_Double_L.d64 / Smooth Move (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  118b  |  7 lines

  1. 5 rem smooth move
  2. 10 print"[147]"
  3. 20 g$="[165][212][199][194][200][217][167]"
  4. 30 for g=1 to 37: for a=1to7: a$=mid$(g$,a,1)
  5. 40 printchr$(19)tab(g)" "a$
  6. 50 next a:next g
  7.